home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / sgwnd10 / frmtest1.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1998-09-14  |  1.0 KB  |  33 lines

  1. VERSION 5.00
  2. Begin VB.Form frmTest15 
  3.    BorderStyle     =   0  'None
  4.    ClientHeight    =   3045
  5.    ClientLeft      =   0
  6.    ClientTop       =   0
  7.    ClientWidth     =   3510
  8.    ControlBox      =   0   'False
  9.    LinkTopic       =   "Form2"
  10.    MaxButton       =   0   'False
  11.    MinButton       =   0   'False
  12.    ScaleHeight     =   3045
  13.    ScaleWidth      =   3510
  14.    ShowInTaskbar   =   0   'False
  15.    Begin VB.CommandButton cmdCreate 
  16.       Caption         =   "Create Window"
  17.       Height          =   432
  18.       Left            =   120
  19.       TabIndex        =   0
  20.       Top             =   120
  21.       Width           =   3252
  22.    End
  23. Attribute VB_Name = "frmTest15"
  24. Attribute VB_GlobalNameSpace = False
  25. Attribute VB_Creatable = False
  26. Attribute VB_PredeclaredId = True
  27. Attribute VB_Exposed = False
  28. Option Explicit
  29. Private w As New clsWindow
  30. Private Sub cmdCreate_Click()
  31.    w.Create Me.HWND, "This is VB managed window", 123, 10, 50, 210, 120, ws_CHILD Or ws_TABSTOP Or ws_VISIBLE Or ws_BORDER Or ws_CLIPSIBLINGS
  32. End Sub
  33.